home *** CD-ROM | disk | FTP | other *** search
/ Click Press Kit / Click Press Kit.iso / pc / main.dxr / Internal_45_SpanishSingleState.ls < prev    next >
Encoding:
Text File  |  2006-05-31  |  2.8 KB  |  84 lines
  1. property spriteNum, myStandardMemberSpanish, myRolloverMemberSpanish, myMouseDownMemberSpanish, myMessageTypeSpanish, myMessageSpanish, myXSpanish, myYSpanish
  2. global gMaster
  3.  
  4. on mouseDown me
  5.   if gMaster.pLanguageMode = "spanish" then
  6.     sprite(spriteNum).member = me.myMouseDownMemberSpanish
  7.   end if
  8. end
  9.  
  10. on mouseEnter me
  11.   cursor(280)
  12.   if gMaster.pLanguageMode = "spanish" then
  13.     sprite(spriteNum).member = me.myRolloverMemberSpanish
  14.   end if
  15. end
  16.  
  17. on beginSprite me
  18.   if gMaster.pLanguageMode = "spanish" then
  19.     sprite(spriteNum).member = me.myStandardMemberSpanish
  20.     sprite(spriteNum).loc = point(myXSpanish, myYSpanish)
  21.   end if
  22. end
  23.  
  24. on mouseLeave me
  25.   cursor(-1)
  26.   if gMaster.pLanguageMode = "spanish" then
  27.     sprite(spriteNum).member = me.myStandardMemberSpanish
  28.   end if
  29. end
  30.  
  31. on mSetUpSpanishSingle me
  32.   if gMaster.pLanguageMode = "English" then
  33.     alert("language should be Spanish")
  34.   else
  35.     sprite(spriteNum).loc = point(myXSpanish, myYSpanish)
  36.     sprite(spriteNum).member = myStandardMemberSpanish
  37.   end if
  38. end
  39.  
  40. on isOKToAttach me, aSpriteType, aSpriteNum
  41.   tisok = 0
  42.   if aSpriteType = #graphic then
  43.     if PermittedMemberTypes().getOne(sprite(aSpriteNum).member.type) > 0 then
  44.       tisok = 1
  45.     end if
  46.   end if
  47.   return tisok
  48. end
  49.  
  50. on PermittedMemberTypes me
  51.   return [#bitmap]
  52. end
  53.  
  54. on GetSuitableMembers me, permittedTypes
  55.   cursor(4)
  56.   suitableMembersList = []
  57.   maxCastLib = the number of castLibs
  58.   repeat with theCastLib = 1 to maxCastLib
  59.     maxMember = the number of castMembers of castLib theCastLib
  60.     repeat with memberNumber = 1 to maxMember
  61.       theMember = member(memberNumber, theCastLib)
  62.       if permittedTypes.getPos(theMember.type) then
  63.         if theMember.name = EMPTY then
  64.           suitableMembersList.append(theMember)
  65.           next repeat
  66.         end if
  67.         suitableMembersList.append(theMember.name)
  68.       end if
  69.     end repeat
  70.   end repeat
  71.   cursor(-1)
  72.   return suitableMembersList
  73. end
  74.  
  75. on getPropertyDescriptionList me
  76.   theMember = sprite(the currentSpriteNum).member
  77.   memberType = theMember.type
  78.   permittedTypes = PermittedMemberTypes(me)
  79.   theMemberNum = theMember.number
  80.   suitableMembersList = GetSuitableMembers(me, permittedTypes)
  81.   descriptionList = [#myStandardMemberSpanish: [#comment: "Spanish - MouseUp member", #format: #member, #range: suitableMembersList, #default: theMember], #myRolloverMemberSpanish: [#comment: "Rollover member", #format: #member, #range: suitableMembersList, #default: member(theMember)], #myMouseDownMemberSpanish: [#comment: "MouseDown member", #format: #member, #range: suitableMembersList, #default: member(theMember)], #myXSpanish: [#comment: "X location", #format: #integer, #default: 100, #range: [#min: 0, #max: 800]], #myYSpanish: [#comment: "Y location", #format: #integer, #default: 100, #range: [#min: 0, #max: 600]]]
  82.   return descriptionList
  83. end
  84.